object TimeTableEditForm: TTimeTableEditForm
  Left = 271
  Top = 185
  ActiveControl = leTableName
  BorderStyle = bsDialog
  BorderWidth = 10
  Caption = '%s Timetable'
  ClientHeight = 373
  ClientWidth = 342
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Shell Dlg'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Image: TImage
    Left = 1
    Top = 6
    Width = 40
    Height = 38
    AutoSize = True
    Picture.Data = {<image000.bmp>}
    Transparent = True
  end
  object Label1: TLabel
    Left = 5
    Top = 56
    Width = 326
    Height = 13
    Caption = 
      'Select the cells according to your timetable and use the pop-up ' +
      'menu'
  end
  object Grid: TStringGrid
    Left = 0
    Top = 78
    Width = 342
    Height = 255
    ColCount = 8
    FixedColor = 16773360
    RowCount = 25
    Options = [goVertLine, goHorzLine, goRangeSelect, goDrawFocusSelected, goThumbTracking]
    PopupMenu = pmSelection
    ScrollBars = ssVertical
    TabOrder = 0
    OnDrawCell = GridDrawCell
    RowHeights = (
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24)
  end
  object btnOk: TButton
    Left = 176
    Top = 348
    Width = 75
    Height = 25
    Caption = '&OK'
    ModalResult = 1
    TabOrder = 1
    OnClick = btnOkClick
  end
  object btnCancel: TButton
    Left = 262
    Top = 348
    Width = 75
    Height = 25
    Cancel = True
    Caption = '&Cancel'
    ModalResult = 2
    TabOrder = 2
  end
  object leTableName: TLabeledEdit
    Left = 57
    Top = 20
    Width = 266
    Height = 21
    EditLabel.Width = 77
    EditLabel.Height = 13
    EditLabel.Caption = 'Timetable Name'
    TabOrder = 3
  end
  object pmSelection: TPopupMenu
    OnPopup = pmSelectionPopup
    Left = 88
    Top = 104
    object pmiEnableSel: TMenuItem
      Caption = '&Enable Selected'
      OnClick = pmiEnableSelClick
    end
    object pmiDisableSel: TMenuItem
      Caption = '&Disable Selected'
      OnClick = pmiDisableSelClick
    end
    object pmiEnableAll: TMenuItem
      Caption = 'E&nable All'
      OnClick = pmiEnableAllClick
    end
    object pmiDisableAll: TMenuItem
      Caption = 'Di&sable All'
      OnClick = pmiDisableAllClick
    end
  end
end